home *** CD-ROM | disk | FTP | other *** search
/ PC Shareware 1997 February / PC Shareware 1997-02.iso / programy / pcbaby / _setup.1 / PCBaby4.exe / 0 / RCDATA / TPICKCHILD / TPICKCHILD.txt
Text File  |  1996-10-21  |  5KB  |  169 lines
  1. object PickChild: TPickChild
  2.   Left = 393
  3.   Top = 172
  4.   BorderStyle = bsDialog
  5.   Caption = 'Pick Child'
  6.   ClientHeight = 214
  7.   ClientWidth = 327
  8.   Font.Color = clBlack
  9.   Font.Height = -11
  10.   Font.Name = 'MS Sans Serif'
  11.   Font.Style = [fsBold]
  12.   Position = poScreenCenter
  13.   OnActivate = FormCreate
  14.   PixelsPerInch = 96
  15.   TextHeight = 13
  16.   object Bevel1: TBevel
  17.     Left = 8
  18.     Top = 8
  19.     Width = 305
  20.     Height = 153
  21.     Shape = bsFrame
  22.     IsControl = True
  23.   end
  24.   object OKBtn: TBitBtn
  25.     Left = 112
  26.     Top = 175
  27.     Width = 93
  28.     Height = 31
  29.     Caption = 'Ok'
  30.     Default = True
  31.     Font.Color = clGreen
  32.     Font.Height = -19
  33.     Font.Name = 'Arial'
  34.     Font.Style = [fsBold]
  35.     ModalResult = 1
  36.     ParentFont = False
  37.     TabOrder = 0
  38.     OnClick = OKBtnClick
  39.     Glyph.Data = {
  40.       F6000000424DF600000000000000760000002800000010000000100000000100
  41.       04000000000080000000CE0E0000D80E00000000000000000000000000000000
  42.       800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
  43.       FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
  44.       5555555555555555555555555205555555555555222055555555555522205555
  45.       5555555222220555555555222222055555555722052220555555720555522055
  46.       5555555555522205555555555555220555555555555552205555555555555572
  47.       0555555555555557205555555555555552205555555555555555}
  48.     Margin = 8
  49.     Spacing = -1
  50.   end
  51.   object CancelBtn: TBitBtn
  52.     Left = 216
  53.     Top = 175
  54.     Width = 93
  55.     Height = 31
  56.     Font.Color = clRed
  57.     Font.Height = -19
  58.     Font.Name = 'Arial'
  59.     Font.Style = [fsBold]
  60.     ParentFont = False
  61.     TabOrder = 1
  62.     OnClick = CancelBtnClick
  63.     Kind = bkCancel
  64.     Margin = 2
  65.     Spacing = -1
  66.   end
  67.   object HelpBtn: TBitBtn
  68.     Left = 12
  69.     Top = 175
  70.     Width = 25
  71.     Height = 31
  72.     Caption = ' '
  73.     Font.Color = clBlack
  74.     Font.Height = -11
  75.     Font.Name = 'MS Sans Serif'
  76.     Font.Style = [fsBold]
  77.     ParentFont = False
  78.     TabOrder = 2
  79.     OnClick = HelpBtnClick
  80.     Kind = bkHelp
  81.     Margin = 2
  82.     Spacing = -1
  83.   end
  84.   object Name: TComboBox
  85.     Left = 24
  86.     Top = 32
  87.     Width = 273
  88.     Height = 32
  89.     Font.Color = clBlack
  90.     Font.Height = -21
  91.     Font.Name = 'Arial'
  92.     Font.Style = []
  93.     ItemHeight = 24
  94.     ParentFont = False
  95.     TabOrder = 3
  96.   end
  97.   object AddButton: TBitBtn
  98.     Left = 16
  99.     Top = 96
  100.     Width = 169
  101.     Height = 41
  102.     Caption = 'Add New Child'
  103.     Font.Color = clNavy
  104.     Font.Height = -19
  105.     Font.Name = 'Arial'
  106.     Font.Style = []
  107.     ParentFont = False
  108.     TabOrder = 4
  109.     OnClick = AddButtonClick
  110.     Glyph.Data = {
  111.       F6000000424DF600000000000000760000002800000010000000100000000100
  112.       04000000000080000000CE0E0000D80E00000000000000000000000000000000
  113.       800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
  114.       FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
  115.       3333333333444443333333333E444443333333333E444443333333333E444443
  116.       333333444444444444433E444444444444433E444444444444433E4444444444
  117.       44433E444444444444433EEEEE44444EEE3333333E444443333333333E444443
  118.       333333333E444443333333333EEEEE3333333333333333333333}
  119.   end
  120.   object DeleteButton: TBitBtn
  121.     Left = 200
  122.     Top = 96
  123.     Width = 105
  124.     Height = 41
  125.     Caption = 'Delete!'
  126.     Font.Color = clRed
  127.     Font.Height = -19
  128.     Font.Name = 'Arial'
  129.     Font.Style = [fsUnderline]
  130.     ParentFont = False
  131.     TabOrder = 5
  132.     OnClick = DeleteButtonClick
  133.     Glyph.Data = {
  134.       26020000424D260200000000000076000000280000001C0000001B0000000100
  135.       040000000000B0010000CE0E0000D80E00000000000000000000000000000000
  136.       8000008000000080800080000000800080008080000080808000C0C0C0000000
  137.       FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00666666666666
  138.       66666666676666660000666666666666666666667B101B160000666666666666
  139.       66666667B101B1B600006666666666666666667B101B1B060000666666666666
  140.       666667B101B1B0B6000066666666666666667B101B1B0B060000666666666666
  141.       66670101B1B0B00600006666666666666672001B1B0B00060000666666666666
  142.       67022201B0B0000600006666666666667B0022000B0000660000666666666667
  143.       B1B10220B0000666000066666666667B1B1B0020000066660000666666666701
  144.       B1B1B0200006666600006666666672001B1B1000006666660000666666670222
  145.       01B1B000066666660000666666780022001B00006666666600006666678D8D02
  146.       20B0000666666666000066667008D800200000666666666600006667FDF08D80
  147.       20000666666666660000667FDFD0D8D00000666666666666000067FDFDF00D80
  148.       0006666666666666000067DFDFDF08000066666666666666000060FDFDFD0000
  149.       06666666666666660000600FDFDF000066666666666666660000600DFDF00006
  150.       6666666666666666000060000000006666666666666666660000660000000666
  151.       66666666666666660000}
  152.   end
  153.   object ChildTable: TTable
  154.     DatabaseName = 'PCBaby4'
  155.     TableName = 'CHILD.DB'
  156.     Left = 72
  157.     Top = 176
  158.     object ChildTableFirstName: TStringField
  159.       FieldName = 'FirstName'
  160.       Size = 50
  161.     end
  162.   end
  163.   object ChildData: TDataSource
  164.     DataSet = ChildTable
  165.     Left = 48
  166.     Top = 176
  167.   end
  168. end
  169.